﻿module Program
//open System
//open System.IO
//open System.Windows.Forms
//open TopDown_LL0_Parser
//
//let rec readAndProcess() =
//  let dlg = OpenFileDialog()
//  dlg.Filter <- "Tiny Java source (*.tyj)|*.tyj"
//  if dlg.ShowDialog() = DialogResult.OK then
//    let fin = File.ReadAllText(dlg.FileName)
//    let fin = fin.Replace("\n"," ")
//    let fin = fin.Replace("\t"," ")
//    let fin = fin.Replace("\r"," ")
//    printfn "parsing [%s]" fin
//    let res = parse program fin
//    ()
//  else
//    Console.WriteLine("Aborted")
//
//[<STAThreadAttribute>]
//readAndProcess()
//
//do Console.ReadLine() |> ignore
